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2. 


EU'I'EIPE {A*I* Memo* No, 129) r was designed a "real-time music pCogtanT 
which would intfltpMC music ■Jascribed as Nr voice-programs 0 in &DT t Th-sss vuice- 
pro grams consisted o£ ncce ^erds, description of tones to be sounded ? and 
c ant r □ 1 wo rds which d e to rmin cd th u pa raise tets of pi tch h tenpo *, ar t i cu La t ion 
and wave form and allowed for n subroutine feature and transfer within the 
vo ice-pro gram r it had been hoped that complex musi-cal foms could be described 
in terms of a few collections of note words and sequences of control words h 
However 3 musical variation and development is mare subtle th&n the. 
den-elopaental power of these control words. Any transformation of 
musical materials ~ay he expressed as a LIE? function; therefore, the control 
words were abandoned and EUTERPE was linked to LIEF, 'I he vo 1 c e- pro grams won Id 
be written and loaded by LIS? and played by EUTERPE. The principle function 
in the ays Lem is LOAD which take;; two arguments; 1} &(l absolute location in 
core and 2} a list of note words. The note words arc translated into 

EUTERPE-rtadab 1* tfide and loaded into the proper voice program. Toe addresses of 
the first location of each of the si* voice programs are 5-ETQed by the system 

with the names VQICE1, ,,., VOICEb. The value of LOAD Is the next file word 

in core* so a series of lists may be loaded by the following bootstrapping 

procedure; 

(SETQ LOG (LOAD VOICE1 LIST1)} 

(SEtq LOC (LOAD LPC LISTS}) 


An example is given at the end of this Memo. 

A note is expressed as a dotted pair; the CAR. denotes pitch, the CDR 
denotes duration, If the CDR is NIL, the duration is assumed to be the sane 
as the preceding not* (this is the same convention as EUTERPE; see example). 
The symbols are the same as in EUTERPE, but they ate EXPLODED Into Lists. 
Hence middle C is now 

(R C) 

and a tripleL-siKteenth hoc* i s 

(1$ T 3), 



Tbara are also a few n control-lists 11 which function as their analogs in 
EUTERPE; those are 


(CANCEL n) (CDR ray be MIL) 

(START n) 

(KELTEM n) 

(TEMPO n) 


(ARTIC n) 
(WAVE n) 
(FINE) 


Finally p there are functions written into the system which may be used in 
desctib44g music 


WA 


_ , . ^-i c,r scale ti Carting on pits]] given ;j.s ar^un^nc: r} 

Ex^ple- (HA. (QUOTE (K 0 ))} has the value ^ 

UK E) (L OS) (L D S) (L E) (1 F S) <L G S) <L A 5) (L 8)) 


HA 

KA 

ME 

HUP 

NDGKN 

TKANSTONAL 


transpose 

Tfc 


1NVEKTQHAL 


INVERT 

RETROG 

3tDTN 


Natural clnor scale (ascending). 

Harmonic minor scale (ascending), 

Melodic Diinur stale (ascending). 

(-■'!- , ] J ’ -N 1) la the p-iLC-h 1 Lul ff-s tops above pitch K. 

I hal£"-steps below pitch N. 

(TKAh'STOBAL X K N) transposes e list of pitches, X, to 
begin on a new note N, in tonality K = (g} pitch) 
(TRANSPOSE X a) is a rigid transposition. 

(TK X N) tains s toll list of input for EUTERPE and 
raises all pitches N half— steps. 

(INVKRTONAL X K) inversion v { list of pitches, X, with 
respect to tonality K, 

(IKVERT X) is rigid inversion. 

(FF.TROG X) is re t togr esalon f 

._(BQTN X K) rotates a list of pitches H itepa. 



4 , 


EKaffiplt: (ROTH (QUOTE ((J S) (J D) (J CD 1) 

has the value" ((J D} (J C} (J E)) , 

■ I 

ir^urii£-nc is a list: of up to six ^itcb&e; scuuds aa a 

■ 

until next input to LISP* 

sounds A\ altera tuning CCmstiinE by numbers typed in a 
terminated by typing nGn-mobe;:. 

transfers to absolute location; (TRANSFER SETUP) prepares 
Compilationj (TRANSFER PLAY) ploys Compiled version. 

The user My disc prepare hie mm function, 

SB'fA is used as follows: The user types in the s-eKpressiun (SETA) and thu 
machine sounds the pitch it assumes to he 440 cps. If this note is flat, the 
user types in a number (as an atom) the ms thine acids this number to its tuning 
constant, and it sound* 4 new pitch. If the note is sharp> the user typus in 
a negative number. Once cUo machine is ir in twne/ r ary non-nuisher («*. B , , the 
atom OK) will terminate $£TA and return to LISI\ 

The following program describe* the Canon from Bach 1 s Kunst dar Futa attached 
at the end of this Memo, The maj.or portion of the program consists of SETQing 

the ueueusdry thematic aleuents which are chan loaded by the cwo PECGs at the 
end. 


CHORD 

SETA 

TEAMS E’ER 



(SETS T3A9-E 1CUI 
(SETS T1 (BJdf? f 

untie e,££atci 
c < J 4 k * 4ft 7 3 ki 

t {J £) ) 
i rj fn 
f[J 3 sn 
r t J B > 9 

[ 4 J l) J 

11 j e n 

i (j ;) v 
E ! J *:) } 

I 4 J El t 
( C J Ml 

< 4 J Jh 
IMT1C SlJRt 

f f J *1 » 4? Ill 
M*trc ve;*t3) 
c < j m . c a t t k 

M3TTC IU3HJ 
tEJ 3k * Cl Tkl 
E t J r n 

E43TTC' uE3*T0 k 
E(J Ei * Efl Til 
i * ?T IC 5LUI> 

( ( J H + C ? Til 
<ft*TIC' UE3*TSJ 
H J ■') * (ft T) J 
UaTI* SLJm 
4 4J El * (ft T> 1 
4 CJ ftn 

4**rr; UJ*TOJ 
4 r j * s k * i B t i k 

( f J ftI * |4 TEJ 
f Mft;. 5LU»k 
4 E J Z\ * f S Til 
f C J *1 ) 
f E J Ilk 

tCU!5 lE$M3) 
f t J 4 > * Cl IH 
f t J S *] * (4 T)I 

CMTIC SLJ^) 
c i j s c i # (4 ni 
C4in: usArrjk 

< t j ;■ sj , 14 Tii 

n * e a r n 

£ (t Ol 
Ml III 
£ ( J C> SM 
U1TI5- SLJ*» 

( 4 J 0 * , (ft T ) ! 

! ( J : ft) k 
4 4 r 3 ) > 

Ci?Tl£ LE3*T4 I 
(It M . (ft Til 
U?T1S S(.U*> 

ICJ l> • (ft Til 

II j i= $ h 
I ci in 

4*3TI£ L£*4TC> 



MI M - (ft Ml 

suu*i 

hj f i * in 
hj rn 

IU 0] • (4 Til 
R * (ft T n 
( tJ 9 Fll 
i i J Ml 

!(U!I UE1*T0) 

( iJ 3 ft I * (ft T> 3 
l»T!I ftLJM 

t (J i i . (ft t n 

E ( J * J J 
r e J Eli 

M9TI2 LESUSl 
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m j mi 
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i *e*r 
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REM 
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C1 * 

(ft 

TM (2 

V 

LJM 

HI M 

1 







( S '9T 

( (1 

9 > > 

(I 

* 

D 1 3 



< *EM 

MJ 

Cl 1 

(1 

* 

m i 



H J DM 
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* 
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REM 
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a 
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( SET3 

17 
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HJ 
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M 

* 
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REM 
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p 
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* 
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H 
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HEM 

( 1 I 

3 

)> 

H 

■ 

Dl it 

* 

01 s 
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1 I J 

r 

■J 
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(1 

M 

on 
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F 
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Cl 

i 
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t *ERT 

IU 

■J 

S 1 

11 

p 

Ull 
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C 3 E I 1 T 

IU 

F 

1 1 

11 

V 

on 



C *EM 

1 1 I 

F 

S 1 s 

11 
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11 

. on 
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C 3 
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z 
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HJ T ) I 
> J J 

(SETS T * I3J9TEI I 
(AMIC LESM 3 T 


HJ 

FI 4 

f ft 

T 31 

HJ 

31 1 



HJ 

FI S 



I C J 

E) 1 



M J 

n i 



HJ 

31 i 



IU 
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(J 
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HJ 
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Tl 1 

HJ 
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HJ 
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hj si si , ci rn 

HI A > S 

h 4 iB t n 
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!■ 
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H 
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■ 
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12 

m 
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■ 
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111 

f!J E) . 19 T 3H 
HJ F M 
n J I)) 
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) 3 } 

£ SETS CS1 OU3TS I 
Him 9LJA1 
H J 3 ) . | i T M 
Mine U34I0) 
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n j n i 
£ I J E'M 
£ ( J 0)1 

I I J 5 ) 4 ( 9 T 3) 1 
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ft J 5 ) ) 

HI *M 
H J CM 
nj c)) 
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(U Oil 

( *£1T HJ Cl) It 4 

nr sn 

nr 4i . e 4 nr i 
nr 3i . (atm 


ji i 
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1 u 

o> 1 



I M 

i ni 



I f I 

*n 



4 U 

j > i 



HI 
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4 {I 
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fit 

M J 



HI 
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Ht 
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u 
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(U 

41 > 



C 4 I 

01 * 

(6 

m 

1 4 I 
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i n 

3 n 

r 

(4 rip 

4 r i 

El * 

15 

T 1 J 

1 4 I 

3 11 



4 4 J 

OJ * 

1 4 

T ] 1 

1 4 

* 4 4 in 


1 U 

4 1 1 



i r l 

3} 1 



i n 

- $ J 1 



4 4 1 

31 . 

4 4 

in 

1 4 1 

4 1 t 

<2 

rn 

1 41 

4) 4 

14 

tm 

1 4 I 

: 9> 

* 

rB Til 

1 41 

Oil 



1 4 I 

Ell 



4(1 

r i i 



4(1 

31 4 

4 3 

T 11) 

4 U 

41 J 



4(1 

31 1 



4 < I 

*1 ) 



r (1 

31 ) 



f c | 

M S 



f c 1 

3 m 

p 

£4 TJ) 

t C E 

31 ) 



( r J 

01 , 

(B 

T 31 1 

(c J 

El I 



(< J 

01 ) 



(c J 

o- an 



H J 

01 ) 



( C J 

t\ i 



> 1 1 




i a: 

T3 05? 

OJ3T! 

(ci 

H * 

(4 

T 1 1 

((L 

0 1 1 



f £ < 

M , 

4 B 

Tin 

4 ( < 

41 1 



4 ( < 

41 1 



4 4 < 

3 9)1 



4M 

4 1 1 



( ( 4 

41 1 



4 Cl 

2 b n 



c (L 

0 1 1 



t CL 

o an 






M < 3 M 
ML £ S)i 
ML &> 1 

(CL a > * <S Fll 
rt< *n 
U*T1S Sl'JPf 
ml *i . 1 4 rn 

(MHO. LE3*T0) 


4 CL 

i a 

< (L 

c a 


* > 

3> t 


I! Tit 


( MftC *LUHt 


ML 


* 

1 ? 

TH 

ni 





fSETa 

C93 

OJ3T' ! 

c t J 

91 

. 

i 1 

1 311 

MJ 

43 

) 



f (J 

3 1 

! 



l [ J 

* 1 

) 



r c J 

3 1 

> 



( f J 

i J 

3 



t r J 

3 

PJ 

4 

(4 r M 

1 c J 

3 J 

3 



11 ] 





<91 

T3 

CS4 

(3J3TE- i 

ML 

* k 

# 

M 

T3 ( 

ML 

g i 

3 



< el 

fis 

4 

1 4 

T 3 1 

h 

• E 

i n j 


{ EL 

3 

n * 



< ll 

4 J 

3 



( (L 

■i 

J 

S3 t 



( 4*TT £ 
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E (L 

4 1 

p- 

(S 

T 3 3 


L *33 
L !ll 
**TI •;= LE3*TDF 
L n 3 * [STM 
4PTI5 SLJB1 
LI ff ) * (STM 
L- ?n 
CL' &3 3 

**rt £ ueitioi 

( l ' st - c a t u 

(L 0 5 , f 1 T M 
‘l H- } 

M 

gpfa sag iajtJn c 

(STM 


( U 

(33 . 


r> > 

( i I 

3 3 3 

1 i I 

4) 3 


9 F H 

( < 1 

3 1 3 


* J > 

t < r 

E> 3 

c 11 

p J . 

t ( i 

9 P3t 

{ El 

S3 3 


{ fl Tt ) 





LL. 


[ I I *1 ) 

MI D \ , El TM 
<"IMEJ 

(SETS C3* I3LT*)TE t 
HJ F1 * IS T sm 
M J 31| 

{ { ) “I J 

IN Ill 
t ( J R'P 1 
IN 313 

MJ *J * Eft TM 
( < J Dll 

<mm£ sum 

M< 91 , I * Ill 
I ART 1C' i,£;iTQ! 

1 (< 91 - (* TH 
H < CM 
f E J 3 7 1 1 
M J 4 M 

m*tic Slum 

(IJ J“) , (J T|| 
t 1 3 

fans 1313; ft,! 

{ SE T 9 Tik (*A*CAR iF'JHCTt SH (lAMBD4 TV) 

{ 2 3 N D I I E 3 (CM VI M1J3TE PERTH (COR VI) 

IT Mill 
T 1 1 J 

(RETJ T23 |RA*CAR EfJMCTISy I^AISD* TV) 
k (S 3 M O' MEO CC*? VI I9J5TE PfRTH ICCND 

< IMJvU' (ASSOC 1 HD CC*CP 111 

Mia ICIJR M9SCC I 111 IQdOTt UM fSOHB I JWMQTE ISEHJP E C 4* D ^ mil ICD*3R 
VIM 

IT IOCNS IEMVCT*! I ftEHl DCMV (CAAOR 11)1 ECOADR VlJMI 
t T VMM 
T 2 ! 3 

(SITC T23 IT? T*S 2313 

fSEt9 T2C E*A»:iA* (FJMCTT DN fLAHBDl f M > 

(CORD ME3 (C*.T VI [RJCTE PERTH ECONfi 
( (ULii I A551C % VII (CAD? I | i 

UE3 (CD? M943C 2 V 3 1 IS JOTE UM E SON'S IENVOTE (9E1IJ* ICAADT ID) ICCADP 
V 3 M 

(T <C3^S (E^STE ISE.H! D3ifJ (CAADR VM1 ICOADR VMM) 

IT VMM 
T 21 ) 

< BET 3 T2C ITT T?C SOM 

j SETS T2& MARJAR if yyJCTTCN (lAMBD* (VI 
130*11 Mfffl tSAR M I0J3TE PE*T1) IECHO 
HM>_L lA'SCC 3 1)1 ICAO? KM 

he; icot naacc 3 in isjote uii rco^s {Ewnote iseiup (caadt vim 

rCOAEM V M 1 

IT ICCNS «E^N3TE- □? Will TCDADP VMM) 

(T VMM 
T21 J 

■v I5ET3 T^A f<1A*CA9 IFJMCT13* C>*BDA IV) 

fC3V9 ((OR (£3 E“*R VI l QJ DTE PF»TM fEl ICAR VI OJClE DORM) (CAD? V) > 

( T VMM 
T31 J 

{SET5 TJg |HA*CAR fFU'ltT!9y <LMBD A f XI 

{20^D I I DR (EO (CAR M C3J3Tt PERT M (E3 fCAR V| 19 J 3 T f C3<*J M l=CM0 
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tj is;*ti Dad'll haadr null) (Oiadr xnm 

( T KMU 
T4 J > 

(SETS CM* MA^CAR £*jN;tltN (LA^St* (JO 
<eiNtr mei «c*R n (Djote rert>) ica^r kii 

( T KIM) 

CM I ) 

(SETS ISIS tMA*CAa (FJNtTlCH rtA*9B* <*> 

(C3^D ((EC (CAR K> ( 3 JlTE MtTII (CONS (ERWCTE (SENIJ* (CAMJR 3f J > > 

(Icadr xm 

( T * )) I | 

CM 1 > 

( SET"3 CMS <TR flSIS 1BH 
(*R13 ML 

(SET3 REP NIL) 

fSETQ »_1C [LOAfl V3ICEI (OtlOTE ( 
r rfA </=■ SCUARE) 

E TE^ =■ 3 21 
)))l 


(SETS 

Lit 

1 LOAD 

Lit 

m i 

( 5 ETQ 

Lit 

(LOAD 

Lit 

TJAl 3 

< seta 

Lit 

IUt*D 

Lit 

T3AI 3 

t SETS 

Lit 

(LOAD 

Lit 

T4 A 1 1 

(SET3 

Lit 

(LOAD 

Lit 

CSlA)) 

(SET! 

Lit 

(LOAD 

Lit 

C3M 3 

(SET! 

Lit 

(LOAD 

Lit 

(TR T3A S)J) 

( SETS 

Lit 

ILIAD 

Lit 

Tin 

(3ET3 

L1C 

(LOAD 

Lit 

Tan) j 

( SET 3 

Lit- 

(LOAD 

Lit 

T3fl 1 3 

ISET3 

Lit 

(LOAD 

Lit 

T4I31 1 

(SETS 

LIS 

(LOAD 

Lit 

CSl 3 1 


(SETS LOC (LOAD Lit Tt S) 

tctNB hep (31 an i 

(SETS REP T3 
Ml A| 

3 (SETQ lIC (LC*t Lit CS5l) 

(RETURN LOCM 
|*RB5 Nit 

(SET3 RE? MU 

< 9ET3 Lit (LOAD V1I1E2 HjDTE I 
(TE*>1 20) 

(R , (1 TH 
(TEN 5 ! Z* 

n n 

* (SET3 Lt: (LOAD Lie (TR Tl 331)1 

I SitJ Lit (LOAD Lie T3EI) » 

(SET? Lit (LOAD Lit TIBn 

I SETS L,1S (Lt*U L3C T«H 

(SETS L1C (L0*0 ICC tTR Tl 30)11 

(SET3 LIE (Lt*0 LlC T2C)) 

(SETS L1C (LOAD Lit TJt)) 

(SETS Lit (LOAD Lit TiC)> 

(SET3 Lit (LOAD Lit CS13H 

(SET! Lit I Lt*t LlC tS2)) 

(SETS Lit (L0*C Lit Tit)) 

(C1N0 HIP (31 911) 

(SETS REP Tl 
(31 A I 

3 (SETS tit (LCAtJ Lit C3M | 

( RETURN Lit 3 3 
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